A visualization of the songs that Fugazi performed live using metadata from the Fugazi Live Series.
This will be constructed using two data tables: - summary - songvarslookup
Let’s get the data and limit it to the columns that we will be using:
mygraphdata <- summary %>%
left_join(songvarslookup)
#> Joining, by = c("songid", "duration_seconds", "releaseid", "release", "track_number", "instrumental", "vocals_picciotto", "vocals_mackaye", "vocals_lally")
mygraphdata <- mygraphdata %>%
select(song, launchdate, chosen, release, rating)
knitr::kable(mygraphdata, "pipe")| song | launchdate | chosen | release | rating |
|---|---|---|---|---|
| bed for the scraping | 1994-11-20 | 299 | Red Medicine | 1.0000000 |
| reclamation | 1990-05-05 | 594 | Steady Diet | 0.9966207 |
| break | 1996-08-15 | 170 | End Hits | 0.9960533 |
| do you like me | 1994-11-20 | 272 | Red Medicine | 0.9675623 |
| closed captioned | 1997-06-18 | 158 | End Hits | 0.9465065 |
| cashout | 2000-09-30 | 59 | The Argument | 0.9378211 |
| place position | 1996-08-15 | 133 | End Hits | 0.9268016 |
| target | 1994-08-15 | 261 | Red Medicine | 0.9160382 |
| waiting room | 1987-09-03 | 628 | Fugazi | 0.9134131 |
| recap modotti | 1997-05-03 | 141 | End Hits | 0.9112874 |
| number 5 | 1998-11-21 | 109 | Furniture | 0.8899869 |
| blueprint | 1989-11-25 | 585 | Repeater | 0.8899828 |
| sieve-fisted find | 1989-04-05 | 417 | Repeater | 0.8801974 |
| merchandise | 1987-09-03 | 474 | Repeater | 0.8779402 |
| rend it | 1991-12-08 | 347 | In on the Killtaker | 0.8749664 |
| arpeggiator | 1997-05-02 | 154 | End Hits | 0.8638688 |
| birthday pony | 1994-08-15 | 200 | Red Medicine | 0.8488863 |
| facet squared | 1991-08-12 | 298 | In on the Killtaker | 0.8456339 |
| margin walker | 1988-08-01 | 426 | Margin Walker | 0.8440263 |
| turnover | 1989-04-09 | 392 | Repeater | 0.8392924 |
| argument | 1999-08-26 | 66 | The Argument | 0.8332195 |
| long division | 1989-04-09 | 497 | Steady Diet | 0.8317865 |
| the kill | 2001-04-05 | 35 | The Argument | 0.8311562 |
| public witness program | 1993-02-05 | 262 | In on the Killtaker | 0.8297181 |
| oh | 1998-11-29 | 78 | The Argument | 0.8241519 |
| fd | 1997-05-02 | 115 | End Hits | 0.8159488 |
| forensic scene | 1994-08-19 | 201 | Red Medicine | 0.8142400 |
| by you | 1993-04-24 | 232 | Red Medicine | 0.8080117 |
| five corporations | 1996-08-15 | 110 | End Hits | 0.8068760 |
| smallpox champion | 1992-10-23 | 251 | In on the Killtaker | 0.8060828 |
| and the same | 1987-09-26 | 374 | Margin Walker | 0.8057744 |
| floating boy | 1996-10-16 | 107 | End Hits | 0.8024899 |
| instrument | 1992-01-25 | 271 | In on the Killtaker | 0.7943190 |
| great cop | 1991-12-08 | 268 | In on the Killtaker | 0.7782936 |
| ex-spectator | 1999-08-26 | 46 | The Argument | 0.7766080 |
| song #1 | 1987-09-03 | 318 | 3 Songs | 0.7730818 |
| give me the cure | 1988-03-30 | 365 | Fugazi | 0.7720281 |
| two beats off | 1989-05-03 | 369 | Repeater | 0.7718995 |
| life and limb | 2001-06-21 | 20 | The Argument | 0.7717270 |
| full disclosure | 2001-04-05 | 24 | The Argument | 0.7629105 |
| repeater | 1989-07-20 | 408 | Repeater | 0.7625363 |
| styrofoam | 1990-05-17 | 288 | Repeater | 0.7539624 |
| epic problem | 2000-10-01 | 30 | The Argument | 0.7528743 |
| suggestion | 1987-12-03 | 338 | Fugazi | 0.7524260 |
| no surprise | 1996-09-29 | 89 | End Hits | 0.7497349 |
| promises | 1988-10-15 | 376 | Margin Walker | 0.7487850 |
| back to base | 1994-11-20 | 135 | Red Medicine | 0.7371805 |
| bad mouth | 1987-10-16 | 276 | Fugazi | 0.7344486 |
| exit only | 1990-07-06 | 275 | Steady Diet | 0.7344139 |
| shut the door | 1989-04-05 | 321 | Repeater | 0.7317727 |
| nightshop | 1999-08-26 | 43 | The Argument | 0.7282955 |
| sweet and low | 1992-05-15 | 247 | In on the Killtaker | 0.7269071 |
| runaway return | 1990-02-11 | 264 | Steady Diet | 0.7036297 |
| downed city | 1994-11-20 | 111 | Red Medicine | 0.6851131 |
| bulldog front | 1988-06-15 | 223 | Fugazi | 0.6814422 |
| walken’s syndrome | 1992-10-23 | 141 | In on the Killtaker | 0.6812393 |
| reprovisional | 1988-12-29 | 275 | Repeater | 0.6799040 |
| fell, destroyed | 1993-08-16 | 134 | Red Medicine | 0.6773280 |
| strangelight | 2001-04-06 | 19 | The Argument | 0.6744349 |
| long distance runner | 1994-11-27 | 112 | Red Medicine | 0.6717824 |
| cassavetes | 1991-07-28 | 171 | In on the Killtaker | 0.6692326 |
| burning too | 1988-08-01 | 212 | Margin Walker | 0.6670845 |
| pink frosty | 1996-03-20 | 67 | End Hits | 0.6647797 |
| burning | 1988-02-06 | 212 | Fugazi | 0.6638530 |
| returning the screw | 1992-10-23 | 134 | In on the Killtaker | 0.6616892 |
| latin roots | 1990-10-01 | 181 | Steady Diet | 0.6572176 |
| greed | 1989-04-05 | 187 | Repeater | 0.6503445 |
| dear justice letter | 1991-01-02 | 148 | Steady Diet | 0.6299659 |
| stacks | 1991-02-15 | 153 | Steady Diet | 0.6232322 |
| caustic acrostic | 1996-01-30 | 51 | End Hits | 0.6219637 |
| last chance for a slow dance | 1991-07-28 | 137 | In on the Killtaker | 0.6113554 |
| lockdown | 1987-12-03 | 162 | Margin Walker | 0.6013495 |
| brendan #1 | 1989-04-05 | 156 | Repeater | 0.6008720 |
| kyeo | 1987-10-07 | 173 | Steady Diet | 0.5934003 |
| nice new outfit | 1991-02-20 | 114 | Steady Diet | 0.5727829 |
| foreman’s dog | 1998-05-01 | 33 | End Hits | 0.5662897 |
| break-in | 1987-10-16 | 134 | 3 Songs | 0.5580242 |
| joe #1 | 1987-09-03 | 130 | 3 Songs | 0.5498234 |
| guilford fall | 1996-08-15 | 32 | End Hits | 0.5433334 |
| glueman | 1988-05-12 | 132 | Fugazi | 0.5345476 |
| furniture | 1987-09-03 | 93 | Furniture | 0.4918178 |
| latest disgrace | 1994-11-20 | 39 | Red Medicine | 0.4759510 |
| provisional | 1988-11-14 | 8 | Margin Walker | 0.4416884 |
| version | 1994-08-27 | 34 | Red Medicine | 0.4331396 |
| steady diet | 1991-04-12 | 46 | Steady Diet | 0.3969311 |
| combination lock | 1994-11-27 | 21 | Red Medicine | 0.3532997 |
| 23 beats off | 1992-10-23 | 26 | In on the Killtaker | 0.3326167 |
| hello morning | 2001-04-27 | 2 | Furniture | 0.2828972 |
| the word | 1987-09-03 | 32 | First Demo | 0.2602199 |
| in defense of humans | 1987-09-03 | 25 | First Demo | 0.2304351 |
| turn off your guns | 1987-09-03 | 15 | First Demo | 0.1345170 |
| polish | 1991-03-06 | 6 | Steady Diet | 0.0000000 |
Now let’s graph the data. The idea is to plot each song as a bubble, with the x-coordinate given by the launch date, and the y-coordinate given by the rating calculated from the choice modelling of the FLS data. The size of the bubble will be proportional to the number of times the song was played live, while the color of the bubble indicates the associated release in the band’s discography. There will be a lot of information packed into this graph!
p <- mygraphdata %>%
ggplot( aes(x=launchdate, y=rating, size = chosen, color=release, label=song)) +
geom_point(shape = 1) +
theme_bw()
ggplotly(p)The graph is interactive:
hover over a song to see specific details about the song
tap on a release in the legend to hide the corresponding bubbles, tap on the release again to reveal them once more. This is useful to focus on one or more specific releases by hiding the others.
Enjoy!